← Index
NYTProf Performance Profile   
For /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/bin/perlcritic
  Run on Sat Mar 19 22:12:22 2016
Reported on Sat Mar 19 22:14:12 2016

Filename(eval 289)[/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Class/Tiny.pm:56]
StatementsExecuted 4 statements in 8µs
Eval Invoked At/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Class/Tiny.pm line 56
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
1117µs8µsPath::IsDev::Object::::set_prefixPath::IsDev::Object::set_prefix
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
148µs11µs
# spent 8µs (7+1) within Path::IsDev::Object::set_prefix which was called: # once (7µs+1µs) by Path::IsDev::Object::__ANON__[/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Path/IsDev/Object.pm:70] at line 69 of Path/IsDev/Object.pm
package Path::IsDev::Object; my $default=$outer_default; sub set_prefix { if (@_ == 1) {if ( !exists $_[0]{set_prefix} ) { $_[0]{set_prefix} = $default->($_[0]) }return $_[0]{set_prefix} } else { return $_[0]{set_prefix}=$_[1] } }
2;